home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / pc / technical documentation / develop / develop issue 24 / develop issue 24 code / quickdraw 3d column.sea / QuickDraw 3D Column / NewEra ƒ / Cube < prev    next >
Encoding:
Text File  |  1995-04-10  |  2.0 KB  |  84 lines  |  [3DMF/????]

  1. 3DMetafile ( 0 8 Normal toc> )
  2. BeginGroup ( DisplayGroup () )
  3. BeginGroup ( InfoGroup () )
  4.     CString ( ":symbol\n {4,3}    @P sub 4 @" )
  5.     CString ( ":name\n cube" )
  6.     CString ( ":dual\n octahedron" )
  7.     CString ( ":sfaces\n 6 6{4}" )
  8.     CString ( ":svertices\n 8 8(@4 sup 3@)" )
  9. EndGroup ()
  10. PickIDStyle ( 1 )
  11. FillStyle ( Filled )
  12. Container (
  13.     Mesh (
  14.         22 # nVertices
  15.         -1.5 -0.5 0 # -3/2  -1/2  0 
  16.         -1.5 0.5 0 # -3/2  1/2  0 
  17.         -0.5 -1.5 0 # -1/2  -3/2  0 
  18.         -0.5 -0.5 0 # -1/2  -1/2  0 
  19.         -0.5 0.5 0 # -1/2  1/2  0 
  20.         -0.5 1.5 0 # -1/2  3/2  0 
  21.         0.5 -1.5 0 # 1/2  -3/2  0 
  22.         0.5 -0.5 0 # 1/2  -1/2  0 
  23.         0.5 0.5 0 # 1/2  1/2  0 
  24.         0.5 1.5 0 # 1/2  3/2  0 
  25.         1.5 -0.5 0 # 3/2  -1/2  0 
  26.         1.5 0.5 0 # 3/2  1/2  0 
  27.         2.5 -0.5 0 # 5/2  -1/2  0 
  28.         2.5 0.5 0 # 5/2  1/2  0 
  29.         -3.5 -1.5 -2 # *   *   *  
  30.         -3.5 -1.5 -1 # *   *   *  
  31.         -3.5 -0.49999999999999994 -2 # *   *   *  
  32.         -3.5 -0.49999999999999989 -1 # *   *   *  
  33.         -2.5 -1.5 -2 # *   *   *  
  34.         -2.5 -1.5 -1 # *   *   *  
  35.         -2.5 -0.49999999999999994 -2 # *   *   *  
  36.         -2.5 -0.49999999999999994 -1 # *   *   *  
  37.         6 0 #nFaces, nContours
  38.         4 15 14 18 19
  39.         4 17 15 19 21
  40.         4 17 16 14 15
  41.         4 14 16 20 18
  42.         4 19 18 20 21
  43.         4 21 20 16 17
  44.     )
  45. )
  46. FillStyle ( Edges )
  47. BackfacingStyle ( Both )
  48. Container (
  49.     Mesh (
  50.         22 # nVertices
  51.         -1.5 -0.5 0 # -3/2  -1/2  0 
  52.         -1.5 0.5 0 # -3/2  1/2  0 
  53.         -0.5 -1.5 0 # -1/2  -3/2  0 
  54.         -0.5 -0.5 0 # -1/2  -1/2  0 
  55.         -0.5 0.5 0 # -1/2  1/2  0 
  56.         -0.5 1.5 0 # -1/2  3/2  0 
  57.         0.5 -1.5 0 # 1/2  -3/2  0 
  58.         0.5 -0.5 0 # 1/2  -1/2  0 
  59.         0.5 0.5 0 # 1/2  1/2  0 
  60.         0.5 1.5 0 # 1/2  3/2  0 
  61.         1.5 -0.5 0 # 3/2  -1/2  0 
  62.         1.5 0.5 0 # 3/2  1/2  0 
  63.         2.5 -0.5 0 # 5/2  -1/2  0 
  64.         2.5 0.5 0 # 5/2  1/2  0 
  65.         -3.5 -1.5 -2 # *   *   *  
  66.         -3.5 -1.5 -1 # *   *   *  
  67.         -3.5 -0.49999999999999994 -2 # *   *   *  
  68.         -3.5 -0.49999999999999989 -1 # *   *   *  
  69.         -2.5 -1.5 -2 # *   *   *  
  70.         -2.5 -1.5 -1 # *   *   *  
  71.         -2.5 -0.49999999999999994 -2 # *   *   *  
  72.         -2.5 -0.49999999999999994 -1 # *   *   *  
  73.         6 0 #nFaces, nContours
  74.         4 4 3 7 8
  75.         4 5 4 8 9
  76.         4 1 0 3 4
  77.         4 3 2 6 7
  78.         4 8 7 10 11
  79.         4 11 10 12 13
  80.  
  81.         )
  82. )
  83. EndGroup ()
  84.